Electronic Clipper 1998 November/Electronic Clipper 1998-11.iso/Idea Source®/teaser.dir/00088_Script_zapit

Text File | 1998-08-25 | 382b | 24 lines

on mousedown me
  global zap

  if zap=1 then
    cursor -1
    set zap=0
    set the loc of sprite 15 to point(76, 448)
    exit
  end if

  if zap=0 then
    cursor 200
    set zap=1
  end if
end

on exitframe me
  global zap
  if zap=1 then
    set the locv of sprite 15 to the mousev
    set the loch of sprite 15 to the mouseh
  end if
end